#include <iostream>
#include <sys/select.h>
#include <sys/time.h>

#include "log.hpp"
#include "Socket.hpp"

using namespace std;

const int defaultport = 8080;
const int fd_num_max = (sizeof(fd_set) * 8);
const int defaultfd = -1; // 辅助数组的初始值

class SelectServer
{
public:
    SelectServer(uint16_t port = defaultport) : _port(port)
    {
        // 初始化辅助数组
        for (int i = 0; i < fd_num_max; i++)
        {
            fd_array[i] = defaultfd;
        }
    }

    void Init()
    {
        _listensock.Socket();
        _listensock.Bind(_port);
        _listensock.Listen();
    }

    void Accepter()
    {
        // accept得到新链接，但是得到新连接后不能直接read ？？？ why
        string clientip;
        uint16_t clientport;
        int sock = _listensock.Accept(&clientip, &clientport);
        if (sock < 0)
            return;
        lg(INFO, "accept success, %s: %d, sock fd: %d", clientip.c_str(), clientport, sock);
        // 将新链接添加到辅助数组中，这样在最外面的循环就能够将将辅助数组中的对应比特位添加到rdfs中了
        // 细节：从1开始，因为0下标是监听套接字
        int pos = 1;
        for (; pos < fd_num_max; pos++)
        {
            if (fd_array[pos] != defaultfd)
                continue;
            else
                break;
        }
        // 如果当前下标等于max就证明没位置了，需要将新连接直接关闭
        if (pos == fd_num_max)
        {
            lg(WARNING, "server is full, close %d now", sock);
            close(sock);
        }
        else
        {
            fd_array[pos] = sock;
            PrintFd();
        }
    }

    // 两参数，该套接字是多少，该套接字在辅助数组中的下标是多少
    void Recver(int fd, int pos)
    {
        // read读取，三判断
        char buffer[1024];
        ssize_t n = read(fd, buffer, sizeof(buffer) - 1);
        if (n > 0)
        {
            buffer[n] = 0;
            cout << "得到数据：" << buffer << endl;
        }
        else if (n == 0)
        {
            lg(INFO, "client quit, me too, close fd is : %d", fd);
            close(fd);
            fd_array[pos] = defaultfd; // 这里本质是从select中移除
        }
        else
        {
            lg(WARNING, "read error: fd is : %d", fd);
            close(fd);
            fd_array[pos] = defaultfd; // 这里本质是从select中移除
        }
    }

    void Handler(fd_set &rfds)
    {
        // 首先遍历辅助数组，如果是default值的话就continue
        for (int i = 0; i < fd_num_max; i++)
        {
            int fd = fd_array[i];
            if (fd == defaultfd)
                continue;

            // 判断是否就绪
            // 接着判断fd也就是数组中的当前位置是否就绪
            if (FD_ISSET(fd, &rfds))
            {
                // 如果是在里面判断是监听套接字还是正常套接字，然后调用不同的函数
                if (fd == _listensock.Getsockfd())
                {
                    // 判断如果是监听套接字的话就进行accept连接
                    Accepter();
                }
                else
                {
                    // 如果是通信的套接字的话就处理数据
                    Recver(fd, i);
                }
            }
        }
    }

    void Start()
    {
        int listensock = _listensock.Getsockfd();
        fd_array[0] = listensock;
        while (true)
        {
            fd_set rfds;
            FD_ZERO(&rfds);
            // 第一次循环，将辅助数组中所关心的比特位进行设置到rfds中，并且找到最大序号的套接字
            int maxfd = fd_array[0];
            for (int i = 0; i < fd_num_max; i++)
            {
                if (fd_array[i] == defaultfd)
                    continue;
                FD_SET(fd_array[i], &rfds); // 此时还没有到内核中？？？是吗
                maxfd = max(maxfd, fd_array[i]);
            }

            // 多路转接
            struct timeval timeout = {0, 0};
            int n = select(maxfd + 1, &rfds, nullptr, nullptr, /*&timeout*/ nullptr);
            switch (n)
            {
            case 0:
                lg(INFO, "在timeout时间内,没有任何文件描述符变为就绪状态");
                break;
            case -1:
                lg(WARNING, "select err,errno:%d,strerror:%s", errno, strerror(errno));
                break;
            default:
                cout << "get a new link..." << endl;
                Handler(rfds);
                break;
            }
        }
    }
    void PrintFd()
    {
        cout << "online fd list: ";
        for (int i = 0; i < fd_num_max; i++)
        {
            if (fd_array[i] == defaultfd)
                continue;
            cout << fd_array[i] << " ";
        }
        cout << endl;
    }
    ~SelectServer()
    {
        // 关闭监听套接字
        _listensock.Close();
    }

private:
    Sock _listensock;
    uint16_t _port;
    int fd_array[fd_num_max]; // 辅助数组
};